-- card: 3511 from stack: in
-- bmap block id: 4175
-- flags: 4000
-- background id: 2609
-- name: Demo Shell


-- part 1 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=9 top=280 right=335 bottom=118
-- title width / last selected line: 0
-- icon id / first selected line: 5040 / 5040
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Mac School¨ Installer
----- HyperTalk script -----
on mouseUp
  global stacks,userLevelSetting
  answer "This will install a button in the Home stack." with "Cancel" or "Install"
  if it is "Cancel" then exit mouseUp
  set lockMessages to true
  lock screen
  set cursor to watch
  put the value of last word of long name of this stack into PathName
  put offset(the short name of this stack,PathName) into temp
  delete char temp to (the number of chars in PathName) of PathName
  set userLevel to 5
  show card button "Mac School® Demo"
  select card button "Mac School® Demo"
  doMenu "Copy Button"
  hide card button "Mac School® Demo"
  push card
  go to card "Stacks" of "Home"
  find whole PathName in field "paths"
  if the result is "not found" then
    put PathName & return before field "paths"
    put field "paths" into stacks
  end if
  go to card "Home"
  repeat with buttonNum = 1 to the number of buttons
    if the short name of button buttonNum is "Mac School® Demo" then
      set userLevel to 2
      choose browse tool
      pop card
      answer "Button is already installed in the Home stack" with "OK"
      exit mouseUp
    end if
  end repeat
  doMenu "Paste Button"
  set userLevel to 2
  choose browse tool
  set the loc of message to 20,100
  set the loc of button "Mac School® Demo" to the mouseLoc
  unlock screen
  put "Move the mouse to position the button, then click." into message
  set cursor to arrow
  repeat until the mouseClick
    set the loc of button "Mac School® Demo" to the mouseLoc
  end repeat
  put empty
  hide message
  lock screen
  set the loc of message to 22,300
  pop card
  unlock screen
  set lockMessages to false
end mouseUp



-- part 2 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=138 top=280 right=335 bottom=247
-- title width / last selected line: 0
-- icon id / first selected line: 5000 / 5000
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Mac School¨ Shell
----- HyperTalk script -----
on mouseUp
  visual zoom open
  go to card "Mac School® Shell"
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=266 top=280 right=335 bottom=375
-- title width / last selected line: 0
-- icon id / first selected line: 5072 / 5072
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Pricing Information
----- HyperTalk script -----
on mouseUp
  visual iris open
  go to card "Module Pricing" of this background
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: A004
-- rect: left=395 top=280 right=335 bottom=504
-- title width / last selected line: 0
-- icon id / first selected line: 5073 / 5073
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: More Information
----- HyperTalk script -----
on mouseUp
  visual iris open
  go to card "More Information"
end mouseUp



-- part 5 (field)
-- low flags: 01
-- high flags: 2004
-- rect: left=9 top=81 right=272 bottom=504
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: 


-- part 6 (button)
-- low flags: 80
-- high flags: A000
-- rect: left=145 top=283 right=331 bottom=239
-- title width / last selected line: 0
-- icon id / first selected line: 5000 / 5000
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Mac School¨ Demo
----- HyperTalk script -----
on mouseUp
  if the optionKey is down then
    visual zoom open
    go to card "Demo Shell" of stack "Mac School® Demo"
  else
    set cursor to none
    visual dissolve
    go to stack "Mac School® Demo"
  end if
end mouseUp



-- part contents for card part 5
----- text -----
Welcome to Chancery Software’s HyperCard demonstration of Mac School.

Mac School is an integrated school administration system for public and private schools that handles all of your school’s record management needs.  Since Mac School’s release in the fall of 1986, the user base has grown in excess of 2400 sites throughout North America.  Because of Chancery’s commitment to providing state-of-the art software, Mac School has matured into a school administration system that is powerful, flexible and truly meets the needs of today’s administrators.

We recommend viewing the Mac School HyperCard demonstration by starting with the four set up modules:  School Set Up, Student, Course and Teacher Details in that order, then proceeding to Scheduling, Report Cards/Transcripts, Attendance, and Library.  It is important to note that information entered in the set up modules is critical to the successful implementation of the applications.

Click on the Mac School Shell to start the demonstration. Click on a module to view further information.  Use the ? to identify icon functions.